home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Epic Interactive Encyclopedia 1998
/
Epic Interactive Encyclopedia, The - 1998 Edition (1998)(Epic Marketing).iso
/
Menufiles
/
scripts
/
makehd_index.script
< prev
next >
Wrap
Text File
|
1992-09-01
|
2KB
|
42 lines
; This script updates the HD index file
; It will be called every time new files are added (subjects)
; Check to see if the index file exists, if so delete it!
;IF EXISTS Epic_Encyclopedia:Menufiles/IndexFiles/HD_Index.txt
; Delete >NIL: Epic_Encyclopedia:Menufiles/IndexFiles/HD_Index.txt
;ENDIF
;Do a directory of each of the directories...
List EpicData:A/ NODATES QUICK NOHEAD DIRS >T:TempIndex_HD
List EpicData:B/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:C/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:D/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:E/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:F/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:G/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:H/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:I/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:J/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:K/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:L/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:M/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:N/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:O/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:P/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:Q/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:R/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:S/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:T/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:U/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:V/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:W/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:X/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:Y/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:Z/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
List EpicData:0/ NODATES QUICK NOHEAD DIRS >>T:TempIndex_HD
;Now copy the HD_Index file to EpicData:IndexFiles/
Copy T:TempIndex_HD EpicData:IndexFiles/HD_Index.txt
Echo "HD_Index_Search.txt - Search version" >EpicData:IndexFiles/HD_Index_Search.txt
Type T:TempIndex_HD >>EpicData:IndexFiles/HD_Index_Search.txt
Delete >NIL: T:TempIndex_HD